home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Almathera Ten Pack 3: CDPD 3
/
Almathera Ten on Ten - Disc 3: CDPD3.iso
/
scope
/
051-075
/
scopedisk66
/
pbg
/
pointerbegone.asm
< prev
next >
Wrap
Assembly Source File
|
1995-03-19
|
1KB
|
38 lines
XREF _AbsExecBase
XREF _LVOOpenLibrary
XREF _LVOCreateProc
XREF _LVOLoadSeg
movea.l _AbsExecBase,a6
clr.l d0
movea.l #Dosname,a1
jsr _LVOOpenLibrary(a6)
move.l d0,Dosptr
Crproc:
move.l Dosptr,a6
move.l #ProcName,d1
jsr _LVOLoadSeg(a6)
move.l d0,d3
move.l Dosptr,a6
move.l #Name,d1
move.l #0,d2
move.l #4000,d4
jsr _LVOCreateProc(a6)
clr.l d0
rts
ProcName: dc.b 'PBG',0
cnop 0,2
Name: dc.b 'name',0
cnop 0,2
Dosname: dc.b 'dos.library',0
cnop 0,2
Dosptr: ds.l 1